package com.zhj.bz.datastructure.linkedlist;

/**
 * 约瑟夫环
 * 丢手帕问题
 * @author zhj
 */
public class Josephu {
    public static void main(String[] args) {
        CircleSingleLinkedList circleSingleLinkedList = new CircleSingleLinkedList();
        circleSingleLinkedList.countBoy(1,2,5);
    }
}
class CircleSingleLinkedList {
    // 创建一个first节点，当前没有编号
    private Boy first = new Boy(-1);

    /**
     * 添加nums个小孩，围成一个圈
     * @param nums
     */
    public void addBoy(int nums) {
        // nums 校验
        if (nums < 1) {
            System.out.println("nums 值不正确");
            return;
        }
        Boy curBoy = null;
        // 使用for来创建我们的循环链表
        for (int i = 1; i <= nums; i++) {
            // 根据编号创建小孩节点
            Boy boy = new Boy(i);
            if (i == 1) {
                first = boy;
                first.setNext(first);
                curBoy = first;
            } else {
                curBoy.setNext(boy);
                boy.setNext(first);
                curBoy = boy;
            }
        }
    }
    public void showBoy() {
        if (null == first) {
            System.out.println("没有任何小孩");
            return;
        }
        Boy curBoy = first;
        while (true) {
            System.out.println("小孩的编号:" + curBoy.getNo());
            if (curBoy.getNext() == first) {
                break;
            }
            curBoy = curBoy.getNext();
        }
    }

    /**
     *
     * @param starNo 表示从第几个小孩开始数数
     * @param countNum 表示数几下
     * @param nums 表示最初有多少个小孩在圈中
     */
    public void countBoy(int starNo, int countNum, int nums) {
        // 先对数据进行校验
        if (first == null || starNo < 1 || starNo > nums) {
            System.out.println("参数输入有误，请重新输入");
            return;
        }
        // 小孩围成圈
        addBoy(nums);
        // 创建要给辅助指针，帮助完成小孩出圈
        Boy helper = first;
        // 需求创建一个辅助指针（变量） helper, 事先应该指向环形链表的最后这个节点
        while (true) {
            if (helper.getNext() == first) {
                // 说明helper指向最后小孩节点
                break;
            }
            helper = helper.getNext();
        }
        // 小孩报数，陷入first 和 helper移动到starNo-1
        for (int i = 0; i < starNo -1; i++) {
            first = first.getNext();
            helper = helper.getNext();
        }
        // 当小孩报数时，让first 和helper指针同事移动m-1 次，然后出圈
        while (true) {
            if (helper == first) { // 说明圈中只有一人
                break;
            }
            for (int i = 0; i < countNum - 1; i++) {
                first = first.getNext();
                helper = helper.getNext();
            }
            System.out.println("小孩" + first.getNo() + "出圈");
            first = first.getNext();
            helper.setNext(first);
        }
        System.out.println("最后留在圈中的幸运小孩" + first.getNo());
    }
}
class Boy {
    private int no;
    private Boy next;

    public Boy(int no) {
        this.no = no;
    }

    public int getNo() {
        return no;
    }

    public void setNo(int no) {
        this.no = no;
    }

    public Boy getNext() {
        return next;
    }

    public void setNext(Boy next) {
        this.next = next;
    }

    @Override
    public String toString() {
        return "Boy{" +
                "no=" + no +
                ", next=" + next +
                '}';
    }
}
